home *** CD-ROM | disk | FTP | other *** search
/ PC Plus SuperCD (UK) 1997 May / PC Plus Super CD Issue 127 (May 1997).iso / delphi2 / delphite.exe / data.z / BRCSTORD.DFM / BRCSTORD.txt
Encoding:
Text File  |  1996-08-12  |  3.3 KB  |  157 lines
  1. object BrCustOrdForm: TBrCustOrdForm
  2.   Left = 235
  3.   Top = 111
  4.   HelpContext = 1
  5.   ActiveControl = CustGrid
  6.   BorderIcons = [biSystemMenu, biMinimize]
  7.   BorderStyle = bsSingle
  8.   Caption = 'Orders By Customer'
  9.   ClientHeight = 307
  10.   ClientWidth = 405
  11.   Font.Color = clBlack
  12.   Font.Height = -11
  13.   Font.Name = 'MS Sans Serif'
  14.   Font.Style = []
  15.   Position = poScreenCenter
  16.   OnShow = FormShow
  17.   PixelsPerInch = 96
  18.   TextHeight = 13
  19.   object CtrlsPanel: TPanel
  20.     Left = 0
  21.     Top = 0
  22.     Width = 405
  23.     Height = 36
  24.     Align = alTop
  25.     BevelOuter = bvNone
  26.     TabOrder = 1
  27.     object ActivateBtn: TSpeedButton
  28.       Left = 281
  29.       Top = 4
  30.       Width = 85
  31.       Height = 25
  32.       AllowAllUp = True
  33.       GroupIndex = 1
  34.       Caption = 'Activate Query'
  35.       OnClick = ActivateQuery
  36.     end
  37.     object DefineBtn: TSpeedButton
  38.       Left = 167
  39.       Top = 5
  40.       Width = 85
  41.       Height = 25
  42.       AllowAllUp = True
  43.       Caption = '&Define Query'
  44.       OnClick = SetQuery
  45.     end
  46.     object Bevel1: TBevel
  47.       Left = 0
  48.       Top = 34
  49.       Width = 405
  50.       Height = 2
  51.       Align = alBottom
  52.       Shape = bsTopLine
  53.     end
  54.     object Navigator: TDBNavigator
  55.       Left = 8
  56.       Top = 5
  57.       Width = 135
  58.       Height = 25
  59.       VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast, nbRefresh]
  60.       ParentShowHint = False
  61.       ShowHint = True
  62.       TabOrder = 0
  63.     end
  64.   end
  65.   object BtnPanel: TPanel
  66.     Left = 0
  67.     Top = 271
  68.     Width = 405
  69.     Height = 36
  70.     Align = alClient
  71.     BevelOuter = bvNone
  72.     TabOrder = 3
  73.     object EditBtn: TButton
  74.       Left = 221
  75.       Top = 6
  76.       Width = 84
  77.       Height = 25
  78.       Caption = '&Edit'
  79.       TabOrder = 0
  80.       OnClick = EditBtnClick
  81.     end
  82.     object CloseBtn: TButton
  83.       Left = 311
  84.       Top = 6
  85.       Width = 84
  86.       Height = 25
  87.       Cancel = True
  88.       Caption = '&Close'
  89.       Default = True
  90.       TabOrder = 1
  91.       OnClick = CloseBtnClick
  92.     end
  93.   end
  94.   object CustPanel: TPanel
  95.     Left = 0
  96.     Top = 36
  97.     Width = 405
  98.     Height = 118
  99.     Align = alTop
  100.     BevelOuter = bvNone
  101.     TabOrder = 0
  102.     object CustGrid: TDBGrid
  103.       Left = 6
  104.       Top = 3
  105.       Width = 393
  106.       Height = 111
  107.       Columns = <
  108.         item
  109.           FieldName = 'CustNo'
  110.         end
  111.         item
  112.           FieldName = 'Company'
  113.         end
  114.         item
  115.           FieldName = 'Phone'
  116.         end
  117.         item
  118.           FieldName = 'LastInvoiceDate'
  119.         end>
  120.       DataSource = MastData.CustMasterSrc
  121.       Options = [dgTitles, dgIndicator, dgColLines, dgRowLines, dgRowSelect]
  122.       ReadOnly = True
  123.       TabOrder = 0
  124.       TitleFont.Color = clBlack
  125.       TitleFont.Height = -11
  126.       TitleFont.Name = 'MS Sans Serif'
  127.       TitleFont.Style = []
  128.       OnDblClick = EditBtnClick
  129.       OnEnter = CustGridEnter
  130.     end
  131.   end
  132.   object OrdersPanel: TPanel
  133.     Left = 0
  134.     Top = 154
  135.     Width = 405
  136.     Height = 117
  137.     Align = alTop
  138.     BevelOuter = bvNone
  139.     TabOrder = 2
  140.     object OrdersGrid: TDBGrid
  141.       Left = 6
  142.       Top = 3
  143.       Width = 392
  144.       Height = 111
  145.       DataSource = MastData.OrdByCustSrc
  146.       Options = [dgTitles, dgIndicator, dgColLines, dgRowLines, dgRowSelect]
  147.       TabOrder = 0
  148.       TitleFont.Color = clBlack
  149.       TitleFont.Height = -11
  150.       TitleFont.Name = 'MS Sans Serif'
  151.       TitleFont.Style = []
  152.       OnDblClick = EditBtnClick
  153.       OnEnter = OrdersGridEnter
  154.     end
  155.   end
  156. end
  157.